unit md5util_import;

interface

uses
  Windows;

const
  md5util_lib = 'md5util.dll';

type

  md5_byte_t = UCHAR;
  md5_word_t = DWORD;
  p_md5_byte_t =  ^md5_byte_t;

  p_md5_state_t = ^md5_state_t;
  md5_state_t = record
    count: array[0..1] of md5_word_t;
    abcd: array[0..3] of md5_word_t;
    buf: array[0..63] of md5_byte_t;
  end;

  md5_digest = array[0..15] of md5_byte_t;

  procedure md5_init(pms: p_md5_state_t); stdcall; external md5util_lib;
  procedure md5_append(pms: p_md5_state_t; data: p_md5_byte_t; nbytes: Integer); stdcall; external md5util_lib;
  procedure md5_finish(pms: p_md5_state_t; digest: md5_digest); stdcall; external md5util_lib;

  
implementation

end.
